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EUTERPE (A, I* Memo* No- 129), wag designed as a "real-time music program" 
vhich would interpret music described a* "voice-programs" in DDT, These voice- 
programs consisted of note words, description of tones to be sounded, and 
control words which determined the paraiaeters of pitch, teapo, articulation 
and wave form and allowed for d subroutine feature and transfer within the 
voice— program, it had been hoped that complex musical forms could be described 
in terms of a few collections of note words and sequences of control words ► 

However, ausical variation and development is rrare subtle than the 
developmental power of these control words. Any transformation of 
musical materials "ay be expressed as a LISP function; therefore, the l::jh ::r:: L 
words were abandoned and EUTERPE was linked to LISP. The voice- pro grants would 
be written and loaded by LISP and played by EUTERPE. The principle function 
in the system ia LOAD which tak.es two arguments: 1} an absolute location in 
core and 2) a list of note words 4 The note words are translated into 

EUTERPE-readable code ajid loaded into the proper voice program. The addresses of 
the first location of each of the six voice programs are SETQed by the system 

with the names VDICE1* . .., V0ICE6- The value of LOAD is the next file word 
in core> so a series of lists may he loaded by the following bootstrapping 
procedure; 

(SETQ LOG (LOAD V0ICE1 LIST1)) 

(SETQ LOC (LOAD LOC LIST2)) 

* -r r 

An example is given at the end o£ this Memo. 

A note is expressed as a dottej pair; the CAR denotes pitch, the CDR 

denotes duration. If the CDR is NIL, the duration is assumed to be the sane 

as the preceding note (this is the same convention as EUTERPE; see example). 

The symbols are the sane as in EUTERPE, but they are EXPLODED into lists. 

Hence middl* C is now 

(K C) 

and a triplet-sixteenth note is 

(16 T 3)* 
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There are also a few "control-lists' 1 which function as their analogs in 
EUTERPE; these are 

(CANCEL n) (CBR may he NIL) 

(STAKT n> 

(RELTEM n) 

(TEMPO n) 

(ARTIC a) 

(WAVE n) 

(FINE) 
Finally, there are functions written into the system which may be used in 
describing music 



f L n , , , , Majar scale sorting on pitch given as argument (a^ndine) 
Exaaple : (MA (QUOTE (K 6))) has the value a lasc-iwiag;, 

((K B) (L C S) (L D S) (L E) (L FS) (L G S) (L A S) (L B)) 

Natural Elinor scale (ascending),. 
Harmonic minor scale (ascending). 
Melodic minor scale (ascending). 
(NUP H) ig the pitch 1 halfi-steps above pitch H. 
1 half -steps below pitch N. 

(TRAK5T0VAL X K S) transposes a list of pitches, X, to 
begin on a new note H, in tonality K = U*™*} pitch) 
(TRANSPOSE X H) is a rigid transposition. 
<TR X N) takes a full list of input for EUTERPE and 
raises all pitches N half-steps. 

(IHVERIONAL X K) inversion of list of pitches, X, with 
respect to tonality K. 
(IKVERT X) is rigid inversion. 
{RETROG X) is retrogression. 
_<MW X_N) rotates a list of pitches IT *t*pa. 
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Example: (ROTN (QUOTE ((J E) (J D) (J O) 1) 
has the value: ((J D) (J C) (J E}). 

CHORD argument: is a list of up to six pitches* sounds as a 

chord until next input to LISP, 
SETA sounds A; alters tuning constant by numbers typed in, 

terminated by typing non-number. 
TRANSFER transfers to absolute location; (TRANSFER SETUP) prepares 

____^^^ compilation; (TRANSFER PLAV) plays compiled version. 



The user may also prepare his own function. 



SETA is used as follows: The user types in the s-expression (SETA) and the 
machine sounds the pitch it assuaes to be 440 cps* If this note is flat, the 
user typfcs in a number (as ad atom) the machine adds this number to its tuning 
constant, and it sounds a new pitch. If the note is sharp, the user typ*s in 
a negative number. Once the machine is "in tune," any non-number (e,g-, the 
atom OK) will terninate SETA and return to LISP. 

The following program describes the Canon from Bach r a Kuns t der Fufi e attached 
at the end of this Memo. The major portion of the prograc consists of SETQing 
the necessary thematic elements which are then loaded by the two PROGs at the 
end. 
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tT C20N5 CENN3TE ISEHIDOWN rCAADft XIJJ (2DADR llllll 

<T Kill] 
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fBET5 T4D MAP3M IFUX3TI3N CLAH9DA (X> 

(23*18 UEO (CAR X) COJJTE PE^Tll IC3N0 

f I N J_L. (A35DC 3 II) C3AD* X)) 

tIEB CSBP CASS33 3 KII I8J0TE Ull (CONS CENlOTE (SENUP ( CONO 

fCMJLL" (ASSOC ? KII COAAFJ* XH 

HEi *2DR CA9S33 2 XH (OJOTE Ull fSENIJP ICAAQR XII) 

IT <5£NI0O«N (CAAD'i XIIJHI r CO ADR X)|> 

(T (C3N* (E^NOT^ (SE^IDOWN I CONO 

ICNJ^L (ASSDC ? X|) (3AADR X)l 

ICE3 I30R (AS332 i X|l (8J0TE Ull (SE1IJP (CAADR XII) 
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